The National Palace Museum Experience/The National Palace Museum Experience.iso/Start.exe/Start.dxr/00006.ls

Text File | 1998-10-29 | 403 b | 18 lines

on exitFrame
  movesprite(2, 320, 30)
end

on movesprite spriteNum, maxhoriz, step
  puppetSprite(spriteNum, 1)
  set horizpos to the locH of sprite spriteNum
  if horizpos > maxhoriz then
    set newloc to horizpos - step
    if newloc > 320 then
      set the locH of sprite spriteNum to horizpos - step
    else
      set the locH of sprite spriteNum to 320
    end if
    go(the frame)
  end if
end